Prelude> take 1 "hello" "h" Prelude> take 1 "" "" Prelude> head "hello" 'h' Prelude> head "" *** Exception: Prelude.head: empty list